home *** CD-ROM | disk | FTP | other *** search
/ Fritz: All Fritz / All Fritz.zip / All Fritz / FILES / MUSIUSIC / PMUSIC12.LZH / POLYCHRD.H < prev    next >
Text File  |  1989-12-08  |  8KB  |  167 lines
  1. /*
  2. *  PolyChrds.h -- chord constant definitions in the Middle octave 
  3. *                 (Where Middle C is lowest note of octave)
  4. *                 for the poly() function.
  5. *
  6. **********************************/
  7.  
  8. #define  TEMPO_VAL   2000   /* (change this if too short) */
  9. #define  DURATION    8      /* eigth note chords */
  10.  
  11. #define  SQ          39     /* single quote ascii value */
  12. #define  CR          13     /* carriage return ascii value */
  13.  
  14. /* Warning: only use the chords you expect to need, as this takes up memory!
  15.             (6 ints = 12 bytes for each chord) */
  16.  
  17. static int a_maj[] =
  18. {  TEMPO_VAL, V1| ANAT_M, V2| CSHA_M, V3| ENAT_M, DUR| DURATION, STOP };
  19. static int ash_maj[] =
  20. {  TEMPO_VAL, V1| ASHA_M, V2| DNAT_M, V3| FNAT_M, DUR| DURATION, STOP };
  21. static int b_maj[] =
  22. {  TEMPO_VAL, V1| BNAT_M, V2| DSHA_M, V3| FSHA_M, DUR| DURATION, STOP };
  23. static int c_maj[] =
  24. {  TEMPO_VAL, V1| CNAT_M, V2| ENAT_M, V3| GNAT_M, DUR| DURATION, STOP };
  25. static int csh_maj[] =
  26. {  TEMPO_VAL, V1| CSHA_M, V2| FNAT_M, V3| GSHA_M, DUR| DURATION, STOP };
  27. static int d_maj[] =
  28. {  TEMPO_VAL, V1| DNAT_M, V2| FSHA_M, V3| ANAT_M, DUR| DURATION, STOP };
  29. static int dsh_maj[] =
  30. {  TEMPO_VAL, V1| DSHA_M, V2| GNAT_M, V3| ASHA_M, DUR| DURATION, STOP };
  31. static int e_maj[] =
  32. {  TEMPO_VAL, V1| ENAT_M, V2| GSHA_M, V3| BNAT_M, DUR| DURATION, STOP };
  33. static int f_maj[] =
  34. {  TEMPO_VAL, V1| FNAT_M, V2| ANAT_M, V3| CNAT_M, DUR| DURATION, STOP };
  35. static int fsh_maj[] =
  36. {  TEMPO_VAL, V1| FSHA_M, V2| ASHA_M, V3| CSHA_M, DUR| DURATION, STOP };
  37. static int g_maj[] =
  38. {  TEMPO_VAL, V1| GNAT_M, V2| BNAT_M, V3| DNAT_M, DUR| DURATION, STOP };
  39. static int gsh_maj[] =
  40. {  TEMPO_VAL, V1| GSHA_M, V2| CNAT_M, V3| DSHA_M, DUR| DURATION, STOP };
  41.  
  42. static int a_min[] =
  43. {  TEMPO_VAL, V1| ANAT_M, V2| CNAT_M, V3| ENAT_M, DUR| DURATION, STOP };
  44. static int ash_min[] =
  45. {  TEMPO_VAL, V1| ASHA_M, V2| CSHA_M, V3| FNAT_M, DUR| DURATION, STOP };
  46. static int b_min[] =
  47. {  TEMPO_VAL, V1| BNAT_M, V2| DNAT_M, V3| FSHA_M, DUR| DURATION, STOP };
  48. static int c_min[] =
  49. {  TEMPO_VAL, V1| CNAT_M, V2| DSHA_M, V3| GNAT_M, DUR| DURATION, STOP };
  50. static int csh_min[] =
  51. {  TEMPO_VAL, V1| CSHA_M, V2| ENAT_M, V3| GSHA_M, DUR| DURATION, STOP };
  52. static int d_min[] =
  53. {  TEMPO_VAL, V1| DNAT_M, V2| FNAT_M, V3| ANAT_M, DUR| DURATION, STOP };
  54. static int dsh_min[] =
  55. {  TEMPO_VAL, V1| DSHA_M, V2| FSHA_M, V3| ASHA_M, DUR| DURATION, STOP };
  56. static int e_min[] =
  57. {  TEMPO_VAL, V1| ENAT_M, V2| GNAT_M, V3| BNAT_M, DUR| DURATION, STOP };
  58. static int f_min[] =
  59. {  TEMPO_VAL, V1| FNAT_M, V2| GSHA_M, V3| CNAT_M, DUR| DURATION, STOP };
  60. static int fsh_min[] =
  61. {  TEMPO_VAL, V1| FSHA_M, V2| ANAT_M, V3| CSHA_M, DUR| DURATION, STOP };
  62. static int g_min[] =
  63. {  TEMPO_VAL, V1| GNAT_M, V2| ASHA_M, V3| DNAT_M, DUR| DURATION, STOP };
  64. static int gsh_min[] =
  65. {  TEMPO_VAL, V1| GSHA_M, V2| BNAT_M, V3| DSHA_M, DUR| DURATION, STOP };
  66.  
  67. static int a_7[] =
  68. {  TEMPO_VAL, V1| ANAT_M, V2| CSHA_M, V3| GNAT_M, DUR| DURATION, STOP };
  69. static int ash_7[] =
  70. {  TEMPO_VAL, V1| ASHA_M, V2| DNAT_M, V3| GSHA_M, DUR| DURATION, STOP };
  71. static int b_7[] =
  72. {  TEMPO_VAL, V1| BNAT_M, V2| DSHA_M, V3| ANAT_M, DUR| DURATION, STOP };
  73. static int c_7[] =
  74. {  TEMPO_VAL, V1| CNAT_M, V2| ENAT_M, V3| ASHA_M, DUR| DURATION, STOP };
  75. static int csh_7[] =
  76. {  TEMPO_VAL, V1| CSHA_M, V2| FNAT_M, V3| BNAT_M, DUR| DURATION, STOP };
  77. static int d_7[] =
  78. {  TEMPO_VAL, V1| DNAT_M, V2| FSHA_M, V3| CNAT_M, DUR| DURATION, STOP };
  79. static int dsh_7[] =
  80. {  TEMPO_VAL, V1| DSHA_M, V2| GNAT_M, V3| CSHA_M, DUR| DURATION, STOP };
  81. static int e_7[] =
  82. {  TEMPO_VAL, V1| ENAT_M, V2| GSHA_M, V3| DNAT_M, DUR| DURATION, STOP };
  83. static int f_7[] =
  84. {  TEMPO_VAL, V1| FNAT_M, V2| ANAT_M, V3| DSHA_M, DUR| DURATION, STOP };
  85. static int fsh_7[] =
  86. {  TEMPO_VAL, V1| FSHA_M, V2| ASHA_M, V3| ENAT_M, DUR| DURATION, STOP };
  87. static int g_7[] =
  88. {  TEMPO_VAL, V1| GNAT_M, V2| BNAT_M, V3| FNAT_M, DUR| DURATION, STOP };
  89. static int gsh_7[] =
  90. {  TEMPO_VAL, V1| GSHA_M, V2| CNAT_M, V3| FSHA_M, DUR| DURATION, STOP };
  91.  
  92. static int a_m7[] =
  93. {  TEMPO_VAL, V1| ANAT_M, V2| CNAT_M, V3| GNAT_M, DUR| DURATION, STOP };
  94. static int ash_m7[] =
  95. {  TEMPO_VAL, V1| ASHA_M, V2| CSHA_M, V3| GSHA_M, DUR| DURATION, STOP };
  96. static int b_m7[] =
  97. {  TEMPO_VAL, V1| BNAT_M, V2| DNAT_M, V3| ANAT_M, DUR| DURATION, STOP };
  98. static int c_m7[] =
  99. {  TEMPO_VAL, V1| CNAT_M, V2| DSHA_M, V3| ASHA_M, DUR| DURATION, STOP };
  100. static int csh_m7[] =
  101. {  TEMPO_VAL, V1| CSHA_M, V2| ENAT_M, V3| BNAT_M, DUR| DURATION, STOP };
  102. static int d_m7[] =
  103. {  TEMPO_VAL, V1| DNAT_M, V2| FNAT_M, V3| CNAT_M, DUR| DURATION, STOP };
  104. static int dsh_m7[] =
  105. {  TEMPO_VAL, V1| DSHA_M, V2| FSHA_M, V3| CSHA_M, DUR| DURATION, STOP };
  106. static int e_m7[] =
  107. {  TEMPO_VAL, V1| ENAT_M, V2| GNAT_M, V3| DNAT_M, DUR| DURATION, STOP };
  108. static int f_m7[] =
  109. {  TEMPO_VAL, V1| FNAT_M, V2| GSHA_M, V3| DSHA_M, DUR| DURATION, STOP };
  110. static int fsh_m7[] =
  111. {  TEMPO_VAL, V1| FSHA_M, V2| ANAT_M, V3| ENAT_M, DUR| DURATION, STOP };
  112. static int g_m7[] =
  113. {  TEMPO_VAL, V1| GNAT_M, V2| ASHA_M, V3| FNAT_M, DUR| DURATION, STOP };
  114. static int gsh_m7[] =
  115. {  TEMPO_VAL, V1| GSHA_M, V2| BNAT_M, V3| FSHA_M, DUR| DURATION, STOP };
  116.  
  117. static int a_dim[] =
  118. {  TEMPO_VAL, V1| ANAT_M, V2| CNAT_M, V3| DSHA_M, DUR| DURATION, STOP };
  119. static int ash_dim[] =
  120. {  TEMPO_VAL, V1| ASHA_M, V2| CSHA_M, V3| ENAT_M, DUR| DURATION, STOP };
  121. static int b_dim[] =
  122. {  TEMPO_VAL, V1| BNAT_M, V2| DNAT_M, V3| FNAT_M, DUR| DURATION, STOP };
  123. static int c_dim[] =
  124. {  TEMPO_VAL, V1| CNAT_M, V2| DSHA_M, V3| FSHA_M, DUR| DURATION, STOP };
  125. static int csh_dim[] =
  126. {  TEMPO_VAL, V1| CSHA_M, V2| ENAT_M, V3| GNAT_M, DUR| DURATION, STOP };
  127. static int d_dim[] =
  128. {  TEMPO_VAL, V1| DNAT_M, V2| FNAT_M, V3| GSHA_M, DUR| DURATION, STOP };
  129. static int dsh_dim[] =
  130. {  TEMPO_VAL, V1| DSHA_M, V2| FSHA_M, V3| ANAT_M, DUR| DURATION, STOP };
  131. static int e_dim[] =
  132. {  TEMPO_VAL, V1| ENAT_M, V2| GNAT_M, V3| ASHA_M, DUR| DURATION, STOP };
  133. static int f_dim[] =
  134. {  TEMPO_VAL, V1| FNAT_M, V2| GSHA_M, V3| BNAT_M, DUR| DURATION, STOP };
  135. static int fsh_dim[] =
  136. {  TEMPO_VAL, V1| FSHA_M, V2| ANAT_M, V3| CNAT_M, DUR| DURATION, STOP };
  137. static int g_dim[] =
  138. {  TEMPO_VAL, V1| GNAT_M, V2| ASHA_M, V3| CSHA_M, DUR| DURATION, STOP };
  139. static int gsh_dim[] =
  140. {  TEMPO_VAL, V1| GSHA_M, V2| BNAT_M, V3| DNAT_M, DUR| DURATION, STOP };
  141.  
  142. static int a_dim7[] =
  143. {  TEMPO_VAL, V1| ANAT_M, V2| CNAT_M, V3| FSHA_M, DUR| DURATION, STOP };
  144. static int ash_dim7[] =
  145. {  TEMPO_VAL, V1| ASHA_M, V2| CSHA_M, V3| GNAT_M, DUR| DURATION, STOP };
  146. static int b_dim7[] =
  147. {  TEMPO_VAL, V1| BNAT_M, V2| DNAT_M, V3| GSHA_M, DUR| DURATION, STOP };
  148. static int c_dim7[] =
  149. {  TEMPO_VAL, V1| CNAT_M, V2| DSHA_M, V3| ANAT_M, DUR| DURATION, STOP };
  150. static int csh_dim7[] =
  151. {  TEMPO_VAL, V1| CSHA_M, V2| ENAT_M, V3| ASHA_M, DUR| DURATION, STOP };
  152. static int d_dim7[] =
  153. {  TEMPO_VAL, V1| DNAT_M, V2| FNAT_M, V3| BNAT_M, DUR| DURATION, STOP };
  154. static int dsh_dim7[] =
  155. {  TEMPO_VAL, V1| DSHA_M, V2| FSHA_M, V3| CNAT_M, DUR| DURATION, STOP };
  156. static int e_dim7[] =
  157. {  TEMPO_VAL, V1| ENAT_M, V2| GNAT_M, V3| CSHA_M, DUR| DURATION, STOP };
  158. static int f_dim7[] =
  159. {  TEMPO_VAL, V1| FNAT_M, V2| GSHA_M, V3| DNAT_M, DUR| DURATION, STOP };
  160. static int fsh_dim7[] =
  161. {  TEMPO_VAL, V1| FSHA_M, V2| ANAT_M, V3| DSHA_M, DUR| DURATION, STOP };
  162. static int g_dim7[] =
  163. {  TEMPO_VAL, V1| GNAT_M, V2| ASHA_M, V3| ENAT_M, DUR| DURATION, STOP };
  164. static int gsh_dim7[] =
  165. {  TEMPO_VAL, V1| GSHA_M, V2| BNAT_M, V3| FNAT_M, DUR| DURATION, STOP };
  166.  
  167.